home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Atari Mega Archive 1
/
Atari Mega Archive - Volume 1.iso
/
language
/
gemfsc18.lzh
/
AESSRC18.LZH
/
AESBIND
/
AESEVNT6.S
< prev
next >
Wrap
Text File
|
1989-04-06
|
806b
|
28 lines
;*========================================================================
;*
;* AESFAST Public Domain GEM bindings.
;*
;*========================================================================
.include "aesfast.sh"
;*************************************************************************
;*
;* Event manager routines 6 of n.
;*
;*************************************************************************
;-------------------------------------------------------------------------
; evnt_dclick
;-------------------------------------------------------------------------
_evnt_dclick::
.cargs #4,.new,.flag
AControl 26,2,1,0
lea .new(sp),a1 ; -> intin
ACall RET2USER
; end of code